home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / mint / editors / mjovesrc.zoo / keys.c < prev    next >
Text File  |  1992-04-04  |  34KB  |  994 lines

  1. /***************************************************************************
  2.  * This program is Copyright (C) 1986, 1987, 1988 by Jonathan Payne.  JOVE *
  3.  * is provided to you without charge, and with no warranty.  You may give  *
  4.  * away copies of JOVE, including sources, provided that this notice is    *
  5.  * included in all the files.                                              *
  6.  ***************************************************************************/
  7.  
  8. /* Warning:  You probably shouldn't put ifdefs anywhere *inside* the keymaps
  9.    definitions.     It'll screw up the stuff in comments (at least), and maybe
  10.    a few other things.    Yes, it *WILL* screw up the comments ... but it's
  11.    not clear that you care ... */
  12.  
  13. #include "jove.h"
  14.  
  15. data_obj *MainKeys[NCHARS] = {
  16.     (data_obj *) &commands[174],    /* C-@ */
  17.     (data_obj *) &commands[16],    /* C-A */
  18.     (data_obj *) &commands[7],    /* C-B */
  19.     (data_obj *) NULL,        /* C-C */
  20.     (data_obj *) &commands[45],    /* C-D */
  21.     (data_obj *) &commands[70],    /* C-E */
  22.     (data_obj *) &commands[87],    /* C-F */
  23.     (data_obj *) NULL,        /* C-G */
  24.     (data_obj *) &commands[47],    /* C-H */
  25.     (data_obj *) &commands[99],    /* C-I */
  26.     (data_obj *) &commands[124],    /* C-J */
  27.     (data_obj *) &commands[112],    /* C-K */
  28.     (data_obj *) &commands[157],    /* C-L */
  29.     (data_obj *) &commands[122],    /* C-M */
  30.     (data_obj *) &commands[126],    /* C-N */
  31.     (data_obj *) &commands[123],    /* C-O */
  32.     (data_obj *) &commands[139],    /* C-P */
  33.     (data_obj *) &commands[153],    /* C-Q */
  34.     (data_obj *) &commands[169],    /* C-R */
  35.     (data_obj *) &commands[167],    /* C-S */
  36.     (data_obj *) &commands[193],    /* C-T */
  37.     (data_obj *) &commands[94],    /* C-U */
  38.     (data_obj *) &commands[127],    /* C-V */
  39.     (data_obj *) &commands[108],    /* C-W */
  40.     (data_obj *) NULL,        /* C-X */
  41.     (data_obj *) &commands[206],    /* C-Y */
  42.     (data_obj *) &commands[135],    /* C-Z */
  43.     (data_obj *) NULL,        /* ESC */
  44.     (data_obj *) &commands[167],    /* C-\ */
  45. #ifndef    MSDOS
  46.     (data_obj *) NULL,        /* C-] */
  47. #else    /* MSDOS */
  48.     (data_obj *) &commands[85],    /* C-] */
  49. #endif    /* MSDOS */
  50.     (data_obj *) &commands[153],    /* C-^ */
  51.     (data_obj *) NULL,        /* C-_ */
  52.     (data_obj *) &commands[172],    /*   */
  53.     (data_obj *) &commands[172],    /* ! */
  54.     (data_obj *) &commands[172],    /* " */
  55.     (data_obj *) &commands[172],    /* # */
  56.     (data_obj *) &commands[172],    /* $ */
  57.     (data_obj *) &commands[172],    /* % */
  58.     (data_obj *) &commands[172],    /* & */
  59.     (data_obj *) &commands[172],    /* ' */
  60.     (data_obj *) &commands[172],    /* ( */
  61.     (data_obj *) &commands[132],    /* ) */
  62.     (data_obj *) &commands[172],    /* * */
  63.     (data_obj *) &commands[172],    /* + */
  64.     (data_obj *) &commands[172],    /* , */
  65.     (data_obj *) &commands[172],    /* - */
  66.     (data_obj *) &commands[172],    /* . */
  67.     (data_obj *) &commands[172],    /* / */
  68.     (data_obj *) &commands[172],    /* 0 */
  69.     (data_obj *) &commands[172],    /* 1 */
  70.     (data_obj *) &commands[172],    /* 2 */
  71.     (data_obj *) &commands[172],    /* 3 */
  72.     (data_obj *) &commands[172],    /* 4 */
  73.     (data_obj *) &commands[172],    /* 5 */
  74.     (data_obj *) &commands[172],    /* 6 */
  75.     (data_obj *) &commands[172],    /* 7 */
  76.     (data_obj *) &commands[172],    /* 8 */
  77.     (data_obj *) &commands[172],    /* 9 */
  78.     (data_obj *) &commands[172],    /* : */
  79.     (data_obj *) &commands[172],    /* ; */
  80.     (data_obj *) &commands[172],    /* < */
  81.     (data_obj *) &commands[172],    /* = */
  82.     (data_obj *) &commands[172],    /* > */
  83.     (data_obj *) &commands[172],    /* ? */
  84.     (data_obj *) &commands[172],    /* @ */
  85.     (data_obj *) &commands[172],    /* A */
  86.     (data_obj *) &commands[172],    /* B */
  87.     (data_obj *) &commands[172],    /* C */
  88.     (data_obj *) &commands[172],    /* D */
  89.     (data_obj *) &commands[172],    /* E */
  90.     (data_obj *) &commands[172],    /* F */
  91.     (data_obj *) &commands[172],    /* G */
  92.     (data_obj *) &commands[172],    /* H */
  93.     (data_obj *) &commands[172],    /* I */
  94.     (data_obj *) &commands[172],    /* J */
  95.     (data_obj *) &commands[172],    /* K */
  96.     (data_obj *) &commands[172],    /* L */
  97.     (data_obj *) &commands[172],    /* M */
  98.     (data_obj *) &commands[172],    /* N */
  99.     (data_obj *) &commands[172],    /* O */
  100.     (data_obj *) &commands[172],    /* P */
  101.     (data_obj *) &commands[172],    /* Q */
  102.     (data_obj *) &commands[172],    /* R */
  103.     (data_obj *) &commands[172],    /* S */
  104.     (data_obj *) &commands[172],    /* T */
  105.     (data_obj *) &commands[172],    /* U */
  106.     (data_obj *) &commands[172],    /* V */
  107.     (data_obj *) &commands[172],    /* W */
  108.     (data_obj *) &commands[172],    /* X */
  109.     (data_obj *) &commands[172],    /* Y */
  110.     (data_obj *) &commands[172],    /* Z */
  111.     (data_obj *) &commands[172],    /* [ */
  112.     (data_obj *) &commands[172],    /* \ */
  113.     (data_obj *) &commands[132],    /* ] */
  114.     (data_obj *) &commands[172],    /* ^ */
  115.     (data_obj *) &commands[172],    /* _ */
  116.     (data_obj *) &commands[172],    /* ` */
  117.     (data_obj *) &commands[172],    /* a */
  118.     (data_obj *) &commands[172],    /* b */
  119.     (data_obj *) &commands[172],    /* c */
  120.     (data_obj *) &commands[172],    /* d */
  121.     (data_obj *) &commands[172],    /* e */
  122.     (data_obj *) &commands[172],    /* f */
  123.     (data_obj *) &commands[172],    /* g */
  124.     (data_obj *) &commands[172],    /* h */
  125.     (data_obj *) &commands[172],    /* i */
  126.     (data_obj *) &commands[172],    /* j */
  127.     (data_obj *) &commands[172],    /* k */
  128.     (data_obj *) &commands[172],    /* l */
  129.     (data_obj *) &commands[172],    /* m */
  130.     (data_obj *) &commands[172],    /* n */
  131.     (data_obj *) &commands[172],    /* o */
  132.     (data_obj *) &commands[172],    /* p */
  133.     (data_obj *) &commands[172],    /* q */
  134.     (data_obj *) &commands[172],    /* r */
  135.     (data_obj *) &commands[172],    /* s */
  136.     (data_obj *) &commands[172],    /* t */
  137.     (data_obj *) &commands[172],    /* u */
  138.     (data_obj *) &commands[172],    /* v */
  139.     (data_obj *) &commands[172],    /* w */
  140.     (data_obj *) &commands[172],    /* x */
  141.     (data_obj *) &commands[172],    /* y */
  142.     (data_obj *) &commands[172],    /* z */
  143.     (data_obj *) &commands[172],    /* { */
  144.     (data_obj *) &commands[172],    /* | */
  145.     (data_obj *) &commands[132],    /* } */
  146.     (data_obj *) &commands[172],    /* ~ */
  147.     (data_obj *) &commands[47],    /* ^? */
  148. #ifndef    ASCII7
  149.     (data_obj *) &commands[172],    /* M-C-@ */
  150.     (data_obj *) &commands[172],    /* M-C-A */
  151.     (data_obj *) &commands[172],    /* M-C-B */
  152.     (data_obj *) &commands[172],    /* M-C-C */
  153.     (data_obj *) &commands[172],    /* M-C-D */
  154.     (data_obj *) &commands[172],    /* M-C-E */
  155.     (data_obj *) &commands[172],    /* M-C-F */
  156.     (data_obj *) &commands[172],    /* M-C-G */
  157.     (data_obj *) &commands[172],    /* M-C-H */
  158.     (data_obj *) &commands[172],    /* M-C-I */
  159.     (data_obj *) &commands[172],    /* M-C-J */
  160.     (data_obj *) &commands[172],    /* M-C-K */
  161.     (data_obj *) &commands[172],    /* M-C-L */
  162.     (data_obj *) &commands[172],    /* M-C-M */
  163.     (data_obj *) &commands[172],    /* M-C-N */
  164.     (data_obj *) &commands[172],    /* M-C-O */
  165.     (data_obj *) &commands[172],    /* M-C-P */
  166.     (data_obj *) &commands[172],    /* M-C-Q */
  167.     (data_obj *) &commands[172],    /* M-C-R */
  168.     (data_obj *) &commands[172],    /* M-C-S */
  169.     (data_obj *) &commands[172],    /* M-C-T */
  170.     (data_obj *) &commands[172],    /* M-C-U */
  171.     (data_obj *) &commands[172],    /* M-C-V */
  172.     (data_obj *) &commands[172],    /* M-C-W */
  173.     (data_obj *) &commands[172],    /* M-C-X */
  174.     (data_obj *) &commands[172],    /* M-C-Y */
  175.     (data_obj *) &commands[172],    /* M-C-Z */
  176.     (data_obj *) &commands[172],    /* M-ESC */
  177.     (data_obj *) &commands[172],    /* M-C-\ */
  178.     (data_obj *) &commands[172],    /* M-C-] */
  179.     (data_obj *) &commands[172],    /* M-C-^ */
  180.     (data_obj *) &commands[172],    /* M-C-_ */
  181.     (data_obj *) &commands[172],    /* M-  */
  182.     (data_obj *) &commands[172],    /* M-! */
  183.     (data_obj *) &commands[172],    /* M-" */
  184.     (data_obj *) &commands[172],    /* M-# */
  185.     (data_obj *) &commands[172],    /* M-$ */
  186.     (data_obj *) &commands[172],    /* M-% */
  187.     (data_obj *) &commands[172],    /* M-& */
  188.     (data_obj *) &commands[172],    /* M-' */
  189.     (data_obj *) &commands[172],    /* M-( */
  190.     (data_obj *) &commands[172],    /* M-) */
  191.     (data_obj *) &commands[172],    /* M-* */
  192.     (data_obj *) &commands[172],    /* M-+ */
  193.     (data_obj *) &commands[172],    /* M-, */
  194.     (data_obj *) &commands[172],    /* M-- */
  195.     (data_obj *) &commands[172],    /* M-. */
  196.     (data_obj *) &commands[172],    /* M-/ */
  197.     (data_obj *) &commands[172],    /* M-0 */
  198.     (data_obj *) &commands[172],    /* M-1 */
  199.     (data_obj *) &commands[172],    /* M-2 */
  200.     (data_obj *) &commands[172],    /* M-3 */
  201.     (data_obj *) &commands[172],    /* M-4 */
  202.     (data_obj *) &commands[172],    /* M-5 */
  203.     (data_obj *) &commands[172],    /* M-6 */
  204.     (data_obj *) &commands[172],    /* M-7 */
  205.     (data_obj *) &commands[172],    /* M-8 */
  206.     (data_obj *) &commands[172],    /* M-9 */
  207.     (data_obj *) &commands[172],    /* M-: */
  208.     (data_obj *) &commands